home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The X-Philes (2nd Revision)
/
The X-Philes Number 1 (1995).iso
/
xphiles
/
hp48_1
/
tvm
< prev
next >
Wrap
Text File
|
1995-03-31
|
3KB
|
162 lines
Article 352 of comp.sys.handhelds:
From: jean@mcgill-vision.uucp (Pierre Racz)
Newsgroups: comp.sys.handhelds
Subject: HP48 Tool box : Engineering Economy
Message-ID: <1990May23.154022.2101@larry.mcrcim.mcgill.edu>
Date: 23 May 90 15:40:22 GMT
Sender: news@larry.mcrcim.mcgill.edu (Usenet File Owner)
Reply-To: pierrer@pike.ee.mcgill.ca (Pierre Racz)
Organization: Electrical Engineering McGill University
Lines: 148
%%HP: T(3)A(R)F(.);
@ Name : ECON - Engineering Economy Tools
@ Author : Pierre Racz
@ Email : pierrer <at> pike.ee.mcgill.ca
@ Date : 90-04-29
@ Release : 1.0
@
@ Checksum : # CE47h
@ Bytes : 900.0
@
@ Descrip :
@ This file contains a directory hierarchy for time-value-of-money
@ computations. The main directory holds the TVM functions,
@ custom menu initialization and a DATA subdirectory where
@ the computations should be performed.
@
@ The following functions have been implemented:
@
@ F<-P Future given present.
@ P<-A Present given annuity.
@ F<-A Future given annuity.
@ P<-G Present given gradient.
@ F<-G Future given gradient.
@ A<-G Annuity given gradient.
@ P<-C Present given Constant rate of change.
@ PRINC Principal remaining on loan.
@ EIR Effective interest rate.
@ NIR Nominal interest rate.
@
DIR
@
@ Time Value of Money functions.
@
@
DATA @ Empty directory for YOUR data.
DIR
END
@
@ ----
@ Custom menu
@
CST { F\<-P P\<-A F\<-A P\<-G F\<-G A\<-G P\<-C PRINC EIR NIR }
@
@ ----
@ Future given Present.
@
@ i : Interest rate per period.
@ n : Number of periods.
@
F\<-P
\<< \-> i n '(1+i)^n'
\>>
@
@ ----
@ Present given Annuity
@
@ i : Interest rate per period.
@ n : Number of periods.
@
P\<-A
\<< \-> i n 'F\<-A(i,n)/F\<-P(i,n)'
\>>
@
@ ----
@ Future given Annuity
@
@ i : Interest rate per period.
@ n : Number of periods.
@
F\<-A
\<< \-> i n '((1+i)^n-1)/i'
\>>
@
@ ----
@ Present given Gradient
@
@ i : Interest rate per period.
@ n : Number of periods.
@
P\<-G
\<< \-> i n 'P\<-A(i,
n)*A\<-G(i,n)'
\>>
@
@ ----
@ Future given Gradient
@
@ i : Interest rate per period.
@ n : Number of periods.
@
F\<-G
\<< \-> i n 'F\<-A(i,n)*A\<-G(i,n)'
\>>
@
@ ----
@ Annuity given Gradient
@
@ i : Interest rate per period.
@ n : Number of periods.
@
A\<-G
\<< \-> i n '1/i-n/((1+i)^n-1)'
\>>
@
@ ----
@ Principal remaining on loan.
@
@ i : Interest rate per period.
@ n : Number of periods into loan.
@ N : Number of periods before payback of loan.
@
PRINC
\<< \-> i n N 'F\<-P(i,n)-P\<-C(0,i,n)/P\<-A(i,N)'
\>>
@
@ ----
@ Effective Interest Rate.
@
@ i : Interest rate per period.
@ n : Number of periods.
@
EIR
\<< \-> i n '(1+i/n)^n-1'
\>>
@
@ ----
@ Nominal Interest Rate
@
@ i : Interest rate per period.
@ n : Number of periods.
@
NIR
\<< \-> i n 'n*((1+i)^(1/n)-1)'
\>>
@
@ ----
@ Present Given Changing Annuity
@
@ i : Interest rate per period.
@ k : Rate at which receipts increase.
@ n : Number of periods.
@
P\<-C
\<< \-> i k n '(1-((1+k)/(1+i))^n)/(i-k)'
\>>
END
@
@